%!PS-Adobe-2.0
%%Title: South_America51 Diplomacy map
%%Creator: mapit
%%Pages: 1 0
%%BoundingBox: (atend)
%%DocumentPaperSizes: Letter A4
%%Orientation: Landscape
%%EndComments

% This is a template for mapit maps produced by Mapmaker for Windows by David
% Norman. This template was written by Gary Duke.
% The intention is to allow any map drawn by Mapmaker to be used to produce
% mapit output with the "look" of the original Diplomacy map under mapit - 
% i.e. with the OrderReport and so on in similar places. The only part of the
% mapit output to suffer is that concerned with the StatusReport, as there
% is no way of guaranteeing a section of the map in which to place it (as
% the ordinary mapit uses the top-right of the standard map for this).

% * Most of this template is the special mapit prologue developed by George 
% * Boyce, which provides the following features:
% *
% * DrawMap      draws the base map
% * DrawName     draws a province name
% * DrawArmy     draws an army
% * DrawFleet    draws a fleet
% * DrawTitle    write game title
% * DrawMessage  write a footnote/message
%
% * OrderReport   positions point to write order report
% * RetreatReport
% * OwnerReport
% * AdjustReport
% * StatusReport
%
% * WriteOrder   writes the order line
% * WriteRetreat
% * WriteOwner
% * WriteAdjust
% * WriteStatus
%
% * ArrowMove    draws arrow indicating a move order
% * ArrowHold
% * ArrowSupport
% * ArrowConvoy
%
% This section is followed by an adjusted version of the MapMaker PS template,
% written by Gary Duke.

/country 0 def

/Black { 0 setgray } bind def
/White { 1 setgray } bind def

/set_country { % N /piececolour /contrast => -
    load /Contrast exch store
    load /PieceColour exch store
    /country exch store
} bind def
/Top 0 def
/Left 997 def
/Right 0 def
/Bottom 1282 def
/mainscale 1.224745 def
/Title (South_America51 Diplomacy) def
/Countries 6 array def
Countries 0 (?) put
/Offsets 6 array def
/ARGENTINA-COLOR { 1.000 0.000 0.251 setrgbcolor } def
Countries 1 (A) put
/ARGENTINA { 1 /ARGENTINA-COLOR /White set_country } def
/ARGENTINACENTER { ARGENTINA-COLOR } def

/BRAZIL-COLOR { 0.521 0.521 1.000 setrgbcolor } def
Countries 2 (B) put
/BRAZIL { 2 /BRAZIL-COLOR /Black set_country } def
/BRAZILCENTER { BRAZIL-COLOR } def

/CHILE-COLOR { 1.000 1.000 0.000 setrgbcolor } def
Countries 3 (C) put
/CHILE { 3 /CHILE-COLOR /Black set_country } def
/CHILECENTER { CHILE-COLOR } def

/COLOMBIA-COLOR { 0.000 1.000 0.000 setrgbcolor } def
Countries 4 (L) put
/COLOMBIA { 4 /COLOMBIA-COLOR /Black set_country } def
/COLOMBIACENTER { COLOMBIA-COLOR } def

/PERU-COLOR { 0.376 0.376 0.376 setrgbcolor } def
Countries 5 (P) put
/PERU { 5 /PERU-COLOR /White set_country } def
/PERUCENTER { PERU-COLOR } def

/Message1 (Variant created by Erlend 'Joe' Janbu. Map Drawn by Juho Snellman.) def
% constants:
  /AdjustScale {mainscale mul} bind def
  /NameOffset {LetterSize} def		% distance below point to draw name
  /UnitOffset {LetterSize -1 mul} def		% distance above point to draw unit

  /TitleFontSize 20 def			% font size (Times-Roman)
  /MessageFontSize 8 def		% font size (Times-Roman)
  /NameFontSize 6 AdjustScale def	% font size (Helvetica-Bold)
  /OrderFontSize 10 def			% font size (Courier)
  /OwnerFontSize 8 def			% font size (Courier)

  /HeadLength 10 AdjustScale def	% of a move arrow head
  /HalfHeadThickness 5 2 div AdjustScale def	

  /HalfThickness 1 2 div AdjustScale def % of a move/support/convoy arrow shaft

  /HoldCircle 16 AdjustScale def	% of a support hold arrow
  /MoveCircle 7 AdjustScale def		% of a support move arrow
  /ConvoyCircle 9 AdjustScale def	% of a convoy arrow

/ShowPage /showpage load def	% nothing special required

/OrderReport {	% to the right of the map
 497 372 moveto
 /Courier findfont OrderFontSize scalefont setfont
} def
/RetreatReport { % below order report with a title in slightly larger font
 497 80 moveto
 /Courier-Bold findfont OrderFontSize 2 add scalefont setfont
 currentpoint OrderFontSize sub 2 sub (Retreat orders:) show moveto
 /Courier findfont OrderFontSize scalefont setfont
} def
/OwnerReport {	% below left half of map
 497 -50 moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def
/AdjustReport {	% below right half of map
 497 -4 moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def
/StatusReport {	% in upper right corner of map
 600 367 moveto
 /Courier findfont OwnerFontSize scalefont setfont
} def

/Write { currentpoint 3 2 roll show moveto 0 FontSize neg rmoveto } def
/WriteOrder { /FontSize OrderFontSize def Write } def
/WriteRetreat { WriteOrder } def
/WriteOwner { /FontSize OwnerFontSize def Write } def
/WriteAdjust { WriteOwner } def
/WriteStatus { pop } def

% failed orders get dashed lines, good orders normal lines
/FailedOrder { [3] 1 setdash } def
/OkOrder { [] 0 setdash } def

/DrawTitle {
 497 413 moveto
 /Times-Roman findfont TitleFontSize scalefont setfont
 currentpoint Title show moveto
 0 TitleFontSize neg rmoveto show
} def

/DrawMessage {
0 424 MessageFontSize add moveto
 /Times-Roman findfont MessageFontSize scalefont setfont
 show
} def

% draw an arrow indicating a move order between two points
/ArrowMove {
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  /dx tipx tailx sub def
  /dy tipy taily sub def
  /angle dy dx atan def

% positon origin at base of arrow with arrow point along x axis
  gsave
  mapdict begin
  MapCoords
  tailx taily translate
  PortraitFlag {UnitOffset neg 0} {0 UnitOffset neg} ifelse translate
  angle rotate
  end

  /arrowlength dx dx mul dy dy mul add sqrt def
  /base arrowlength HeadLength sub def

  % if base of arrow is long enough, shorten it
  % e.g. which moves arrow start beyond support circle
  /x base LetterSize gt {/base base LetterSize sub def LetterSize /arrowlength arrowlength LetterSize sub def} {0} ifelse def
  % if base is still 5 or longer, shorten it some more
  % which makes arrow head touch support circle
  base LetterSize ge {/base base LetterSize sub def /arrowlength arrowlength LetterSize sub def} if

  x 0 translate

  newpath
  0 HalfThickness neg moveto
  base HalfThickness neg lineto
  base HalfHeadThickness neg lineto
  arrowlength 0 lineto
  base HalfHeadThickness lineto
  base HalfThickness lineto
  0 HalfThickness lineto
  closepath

  stroke
  grestore
} def

% draw an arrow indicating support of a unit holding at p1
/ArrowHold {
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  tailx taily tipx tipy HoldCircle ArrowCircle

} def

% draw arrow indicating support of a unit moving from p1 to p2
/ArrowSupport {
  /y2 exch def
  /x2 exch def
  /y1 exch def
  /x1 exch def
  /taily exch def
  /tailx exch def

% find midpoint of (x1,y1)-(x2,y2)
  /tipx x1 x2 min x1 x2 sub abs 2 div add def
  /tipy y1 y2 min y1 y2 sub abs 2 div add def

  tailx taily tipx tipy MoveCircle ArrowCircle

} def

% draw arrow indicating convoy of a unit moving from p1 to p2
/ArrowConvoy {
  /y2 exch def
  /x2 exch def
  /y1 exch def
  /x1 exch def
  /taily exch def
  /tailx exch def

% find midpoint of (x1,y1)-(x2,y2)
  /tipx x1 x2 min x1 x2 sub abs 2 div add def
  /tipy y1 y2 min y1 y2 sub abs 2 div add def

  tailx taily tipx tipy ConvoyCircle ArrowCircle

} def

/ArrowCircle {	% like an arrow but with a circle at the tip
  /headdiam exch def
  /tipy exch def
  /tipx exch def
  /taily exch def
  /tailx exch def

  /dx tipx tailx sub def
  /dy tipy taily sub def
  /arrowlength dx dx mul dy dy mul add sqrt def
  /angle dy dx atan def
  /base arrowlength headdiam sub def

% positon origin at base of arrow with arrow point along x axis
  gsave
  mapdict begin
  MapCoords
  tailx taily translate
  PortraitFlag {UnitOffset neg 0} {0 UnitOffset neg} ifelse translate
  angle rotate
  end

  % if base of arrow is long enough, shorten it by LetterSize
  % e.g. which moves arrow start beyond support circle
  /x base LetterSize gt {/base base LetterSize sub def /arrowlength arrowlength LetterSize sub def LetterSize} {0} ifelse def

  x 0 translate

% draw the shaft first...
  base HalfThickness neg moveto
  0 HalfThickness neg lineto
  0 HalfThickness lineto
  base HalfThickness lineto
% now the circle...
  /a 180 HalfThickness headdiam 2 div atan sub def
  /b 180 HalfThickness headdiam 2 div atan add def
  arrowlength 0 headdiam a b arcn

  closepath
  stroke
  grestore
} def

% draw the given name centered just below the specified point
/DrawName { % x y str => -
mapdict begin
 gsave
 /Helvetica-Bold findfont NameFontSize scalefont setfont
 MapCoords
 3 1 roll translate
 NormCoords
 dup stringwidth pop
 -2 div 0 NameOffset sub moveto show
 grestore
end
} def

/max { % p q => max(p,q)
  2 copy lt { exch} if pop
} bind def

/min { % p q => min(p,q)
  2 copy gt { exch} if pop
} bind def

/InitLetters {
  0 0				% maxdx maxdy
  0 1 Countries length 1 sub {
    /N exch def
    Countries N get	% maxdx maxdy (N)
    newpath 0 0 moveto
    true charpath pathbbox     % ... llx lly urx ury
    %
    % Compute the offset in to centre the letter at 0,0
       4 copy		% llx lly urx ury
       3 -1 roll add -2 div	% llx urx dy
       3 1 roll add -2 div	% dy dx
       exch 2 array astore	% [dx,dy]
       Offsets N 3 -1 roll put  % - ([dx,dy] stored in offsets)
    %
    % Update maximum xwidth, ywidth
    3 -1 roll sub		% llx urx leny
    3 1 roll exch sub exch	% lenx leny
    				% maxdx maxdy lenx leny
    3 -1 roll max		% maxdx lenx newmaxdy
    3 1 roll max		% newmaxdy newmaxdx
    exch
  } for

  newpath
  % maxdx maxdy = biggest bounding rectangle of the letters
  max 1.5 mul /LetterSize exch def
} def

/Helvetica-Bold findfont NameFontSize scalefont setfont InitLetters

/PieceColour { 1 setgray } bind def
/Contrast { 0 setgray } bind def

% Army is a little cannon...
/DrawArmy { % x y X => -
  mapdict begin
  country
  3 1 roll 
  PortraitFlag {exch} if
  UnitOffset sub
  PortraitFlag {exch} if
  gsave MapCoords translate NormCoords
    gsave 
      newpath
      LetterSize 14 div dup scale
      -20 7 moveto 30 0 rlineto 0 -4 rlineto 4 0 rlineto
       0 -2 rlineto -30 0 rlineto 0  2 rlineto -4 0 rlineto
       0 4 rlineto		% barrel
       4 2 moveto 20 -10 rlineto 2 0 rlineto -8 0 rlineto
      -20  10 rlineto		% carriage
      Contrast 2 setlinewidth stroke
      0 0 9 0 360 arc	% wheel
      closepath
      Contrast 2 setlinewidth stroke
      newpath
      -20 7 moveto 30 0 rlineto 0 -4 rlineto 4 0 rlineto
       0 -2 rlineto -30 0 rlineto 0  2 rlineto -4 0 rlineto
       0 4 rlineto		% barrel
       4 2 moveto 20 -10 rlineto 2 0 rlineto -8 0 rlineto
      -20  10 rlineto		% carriage
      PieceColour fill
      0 0 9 0 360 arc	% wheel
      closepath
      PieceColour fill
    grestore
    dup Offsets exch get aload pop	% N dx dy
    moveto
    /Helvetica-Bold findfont NameFontSize scalefont setfont
    Countries exch get Contrast show	% then a white letter
  grestore
  end
} bind def

% Is it a bird? Is it a balloon? Is it Superman? NO! It's an airplane!
/DrawWing { % N x y => -
  country
  3 1 roll UnitOffset add
  gsave translate
    gsave 
      newpath
      LetterSize 14 div dup scale
      % Start from the front
      2 24 moveto
      
      % left part of cockpit
      -1 0 rlineto -1 -5 rlineto 0 -4 rlineto
      
      % Left wing
      -1 -2 rlineto -12 -9 rlineto -0.5 1.5 rlineto -.5 -1.5 rlineto
      0 -5 rlineto 1 0 rlineto 0 1 rlineto 10 1 rlineto
      1 0 rlineto 
      
      % tail 
      1 -6 rlineto -3 -1 rlineto 0 -1 rlineto 10 0 rlineto
      0 1 rlineto -3 1 rlineto 1 6 rlineto 
      
      % Right wing
      1 0 rlineto 10 -1 rlineto 0 -1 rlineto 1 0 rlineto 
      0 5 rlineto -.5 1.5 rlineto -.5 -1.5 rlineto -12 9 rlineto
      -1 2 rlineto 

      % right part of cockpit
      0 4 rlineto -1 5 rlineto -1 0 rlineto
      closepath
      gsave Contrast 2 setlinewidth stroke grestore
      gsave PieceColour fill grestore 
    grestore
    dup Offsets exch get aload pop	% N dx dy
     exch 1 add exch 3.5 add 
    moveto    
        
    /Helvetica-Bold findfont NameFontSize scalefont setfont
    Countries exch get Contrast show	% then a white letter
    
  grestore
} bind def 

% Fleet is a little boat...
/DrawFleet { % N x y => -
  mapdict begin
  country
  3 1 roll
  PortraitFlag {exch} if
  UnitOffset sub
  PortraitFlag {exch}  if
  gsave MapCoords translate NormCoords
    gsave 
      newpath
      LetterSize 14 div dup scale
      -26 -7 moveto 0 5 rlineto 7 0 rlineto 0 1 rlineto		% to bow
      -3 0 rlineto 0 1 rlineto 7 0 rlineto 0 1 rlineto		% A turret
      -3 0 rlineto 0 1 rlineto 8 0 rlineto 0 -2 rlineto		% B turret
      1 0 rlineto 0 4 rlineto 1 0 rlineto 0 2 rlineto		% conn tower
      2 0 rlineto 0 -1 rlineto 1 0 rlineto 0 4 rlineto		% Infra struct
      2 0 rlineto 0 5 rlineto 1 0 rlineto 0 -5 rlineto		% funnel 1
      2 0 rlineto 0 -4 rlineto 1 0 rlineto 0 3 rlineto		% funnel 2
      2 0 rlineto 0 5 rlineto 1 0 rlineto 0 -5 rlineto		% mast 2
      2 0 rlineto 0 -8 rlineto 2 0 rlineto 0 2 rlineto		% funnel 2
      8 0 rlineto 0 -1 rlineto -3 0 rlineto 0 -1 rlineto	% C turret
      7 0 rlineto 0 -1 rlineto -3 0 rlineto 0 -1 rlineto	% D turret
      6 0 rlineto 0 -1 rlineto 2 0 rlineto 0 -2 rlineto		% stern
      -1 0 rlineto 0 -2 rlineto
      closepath
      gsave Contrast 2 setlinewidth stroke grestore
      PieceColour fill
    grestore
    dup Offsets exch get aload pop	% N dx dy
    moveto
    /Helvetica-Bold findfont NameFontSize scalefont setfont
    Countries exch get Contrast show	% then a white letter
  grestore
  end
} bind def

% Here follows the adjusted Mapmaker -> PS template

% * This template is designed to allow MapMaker to output a map in PostScript.
% * It outputs a map with titles and messages (for copyright, etc) fitting 
% * into 8"x11" Landscape (so should be okay for both A4 and Letter paper).
% The map itself is scaled into a 423x592pts rectangle, with extra space at 
% bottom and right for mapit stuff...
% * This template file was written by Gary Duke.

/Message2 (Map produced by David Norman's MapMaker for Windows via template by Gary Duke.) def
/Message3 (Diplomacy is a trademark of the Avalon Hill Game Company, all rights reserved.) def

/mapdict 22 dict def
mapdict begin
% Set up scaling parameters:
/deltav Top Bottom sub abs def   % abs(T-B)
/deltah Right Left sub abs def   % abs(R-L)
/PortraitFlag true def % True for Portrait map, False for Lands.

/vrefl Top Bottom lt def    % vrefl is True if vertical axis is reflected
/hrefl Right Left lt def    % hrefl is True if horizontal axis is reflected

PortraitFlag
{
/vscaling 592 deltav div def % 592/(abs(T-B))
/hscaling 423 deltah div def % 423/(abs(R-L)) 
} 
{
/vscaling 423 deltav div def % 423/(abs(T-B))
/hscaling 592 deltah div def % 592/(abs(R-L))
}
ifelse
% Now hscaling and vscaling contain the scale factors for the map coords

/lin /lineto load def             % Alias for lineto
/mv /moveto load def              % Alias for moveto

% Set up procedure to change from normal to map coords
/MapCoordsPort                    % Change to map coords - if Portrait
{
0 423 translate
270 rotate
hscaling hrefl {-1} {1} ifelse div
vscaling vrefl {-1} {1} ifelse div
scale
Left neg Bottom neg translate
-230 0 translate
}
def
/MapCoordsLand                    % Change to map coords - if Landscape
{
hscaling hrefl {-1} {1} ifelse div
vscaling vrefl {-1} {1} ifelse div
scale
Left neg Bottom neg translate
}
def
/MapCoords
PortraitFlag
{ /MapCoordsPort } { /MapCoordsLand }
ifelse
load
def

% Set up procedure to change from map to normal coords -
%  actually only unscale and rotate (as required)
/NormCoordsPort                   % Change to normal coords - if Portrait
{
hrefl {-1} {1} ifelse hscaling div
vrefl {-1} {1} ifelse vscaling div
scale
90 rotate
}
def
/NormCoordsLand                   % Change to mormal coords - if Landscape
{
hrefl {-1} {1} ifelse hscaling div
vrefl {-1} {1} ifelse vscaling div
scale
}
def
/NormCoords
PortraitFlag
{/NormCoordsPort } { /NormCoordsLand }
ifelse
load
def

/neutcentre             % Draws (neutral) supply centre symbol
{gsave newpath          % Save coord system and start new path
translate NormCoords    % Reset origin and undo scaling
0 -1.5 NameOffset mul    % Want centre of symbol below name
2 mainscale mul         % Radius 2 units
0 360 arc               % Draw and stroke
gsave UNOWNEDCENTER fill grestore
Black .25 setlinewidth stroke 
grestore}
def

/homecentre             % Draws (home) supply centre symbol
{gsave newpath          % Save coord system and start new path
translate NormCoords    % Reset origin and undo scaling
0 -1.5 NameOffset mul    % Want centre of symbol below name
2 mainscale mul         % Radius 2 units
0 360 arc               % Draw and fill
fill
grestore}
def

/NO                    % Normal province - nothing needed (mapit draws names)
{pop pop}
def

/NC                    % Neutral centre province - draw symbol
{
neutcentre
}
def

/HC                    % Home centre province - draw symbol
{
neutcentre
}
def

end   % Definitions for mapdict completed

% Can't be defined inside mapdict, since this is called from code generated
% by mapit. Should not be used from inside DrawMap.
/supply                 % Draws supply centre symbol, in default color
{mapdict begin         
gsave newpath          % Save coord system and start new path
MapCoords translate NormCoords % Change to map coordinates for the translate
0 -1.5 NameOffset mul   % Want centre of symbol below name
2 mainscale mul
0 360 arc               % Create path
gsave    fill         % Fill, then add small black border for contrast
grestore 0.05 mainscale mul setlinewidth Black stroke 
grestore
end
}
def
% Color for unowned centers 
/UNOWNEDCENTER  { 0.6 0.45 0.2 setrgbcolor } def

% Now for 'shell' of DrawMap routine
/premap {
% First we place origin at lower left corner of map, and rotate to Landscape
461 20 translate 90 rotate
gsave

% Set up line width for main map:
% Linewidth will be geometric mean of scalings in "units"
% mainscale hscaling vscaling mul sqrt div setlinewidth

MapCoords
} def

/postmap {
grestore
 
% Print Mapmaker copyright messages
/Times-Roman findfont 8 scalefont setfont
0 -106 moveto Message1 show
0 -112 moveto Message2 show
0 -118 moveto Message3 show
1.25 setlinewidth
} def

% BeginEPSF and EndEPSF copied from Adobe Document 5001 
% from partners.adobe.com
/BeginEPSF { %def
/b4_Inc_state save def % Save state for cleanup
/dict_count countdictstack def % Count objects on dict
/op_count count 1 sub def % Count objects on operand stack
userdict begin % Push userdict on dict stack
/showpage { } def % Redefine showpage, { } = null proc
0 setgray 0 setlinecap % Prepare graphics state
1 setlinewidth 0 setlinejoin
10 setmiterlimit [ ] 0 setdash newpath
/languagelevel where % If level not equal to 1 then
{pop languagelevel % set strokeadjust and
1 ne % overprint to their defaults.
{false setstrokeadjust false setoverprint
} if
} if
} bind def

/EndEPSF { %def
count op_count sub {pop} repeat % Clean up stacks
countdictstack dict_count sub {end} repeat
b4_Inc_state restore
} bind def

/doeps {
gsave
0 1283 translate
-90 rotate
BeginEPSF
%%BeginDocument
%!PS-Adobe-2.0 EPSF-2.0
%%Title: sa51b.eps
%%Creator: fig2dev Version 3.2 Patchlevel 3d
%%CreationDate: Mon Oct 21 03:10:49 2002
%%For: jsnell@kiki (Juho Snellman)
%%BoundingBox: 0 0 997 1282
%%Magnification: 1.0000
%%EndComments
/$F2psDict 200 dict def
$F2psDict begin
$F2psDict /mtrx matrix put
/col-1 {0 setgray} bind def
/col0 {0.000 0.000 0.000 srgb} bind def
/col1 {0.000 0.000 1.000 srgb} bind def
/col2 {0.000 1.000 0.000 srgb} bind def
/col3 {0.000 1.000 1.000 srgb} bind def
/col4 {1.000 0.000 0.000 srgb} bind def
/col5 {1.000 0.000 1.000 srgb} bind def
/col6 {1.000 1.000 0.000 srgb} bind def
/col7 {1.000 1.000 1.000 srgb} bind def
/col8 {0.000 0.000 0.560 srgb} bind def
/col9 {0.000 0.000 0.690 srgb} bind def
/col10 {0.000 0.000 0.820 srgb} bind def
/col11 {0.530 0.810 1.000 srgb} bind def
/col12 {0.000 0.560 0.000 srgb} bind def
/col13 {0.000 0.690 0.000 srgb} bind def
/col14 {0.000 0.820 0.000 srgb} bind def
/col15 {0.000 0.560 0.560 srgb} bind def
/col16 {0.000 0.690 0.690 srgb} bind def
/col17 {0.000 0.820 0.820 srgb} bind def
/col18 {0.560 0.000 0.000 srgb} bind def
/col19 {0.690 0.000 0.000 srgb} bind def
/col20 {0.820 0.000 0.000 srgb} bind def
/col21 {0.560 0.000 0.560 srgb} bind def
/col22 {0.690 0.000 0.690 srgb} bind def
/col23 {0.820 0.000 0.820 srgb} bind def
/col24 {0.500 0.190 0.000 srgb} bind def
/col25 {0.630 0.250 0.000 srgb} bind def
/col26 {0.750 0.380 0.000 srgb} bind def
/col27 {1.000 0.500 0.500 srgb} bind def
/col28 {1.000 0.630 0.630 srgb} bind def
/col29 {1.000 0.750 0.750 srgb} bind def
/col30 {1.000 0.880 0.880 srgb} bind def
/col31 {1.000 0.840 0.000 srgb} bind def

end
save
newpath 0 1282 moveto 0 0 lineto 997 0 lineto 997 1282 lineto closepath clip newpath
-160.4 1456.1 translate
1 -1 scale

/cp {closepath} bind def
/ef {eofill} bind def
/gr {grestore} bind def
/gs {gsave} bind def
/sa {save} bind def
/rs {restore} bind def
/l {lineto} bind def
/m {moveto} bind def
/rm {rmoveto} bind def
/n {newpath} bind def
/s {stroke} bind def
/sh {show} bind def
/slc {setlinecap} bind def
/slj {setlinejoin} bind def
/slw {setlinewidth} bind def
/srgb {setrgbcolor} bind def
/rot {rotate} bind def
/sc {scale} bind def
/sd {setdash} bind def
/ff {findfont} bind def
/sf {setfont} bind def
/scf {scalefont} bind def
/sw {stringwidth} bind def
/tr {translate} bind def
/tnt {dup dup currentrgbcolor
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
  bind def
/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
  4 -2 roll mul srgb} bind def
/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
/$F2psEnd {$F2psEnteredState restore end} def
/fb {45.000 slw} def
/nb {30.000 slw} def
/cb {30.000 slw} def
/sb {30.000 slw} def
/ib {7.500 slw} def

$F2psBegin
10 setmiterlimit
 0.06000 0.06000 sc

dofig

$F2psEnd
rs
%%EndDocument
EndEPSF
grestore
} def

/dofig {
%
% Fig objects follow
%
% Polyline
fb
n 2717 2955 m 19230 2955 l 19230 24225 l 2717 24225 l
 cp gs col11 1.00 shd ef gr gs col0 s gr 
% Arc
sb
n 6900.7 18209.2 1837.9 162.2 58.2 arcn
gs col0 s gr

% Arc
n 41055.9 8144.6 37724.5 164.7 -175.1 arc
gs col0 s gr

% Polyline
cb
n 4560 2985 m 4350 3375 l 4350 3450 l 4350 3525 l 4425 3600 l 4350 3750 l
 4275 3825 l 4275 3975 l 4200 4050 l 4275 4200 l 4200 4275 l
 4275 4350 l 4200 4500 l 4125 4575 l 4200 4725 l 4350 4950 l
 4575 5025 l 4875 5175 l 5100 5100 l 5250 4950 l 5325 4875 l
 5550 4875 l 5775 4950 l 5925 5100 l 6075 5175 l 6075 5100 l
 6150 5025 l 6300 4950 l 6600 4875 l 6450 4725 l 6450 4575 l
 6675 4275 l 6750 4425 l 6825 4350 l 7125 4275 l 7350 4125 l
 7425 4050 l 7725 3975 l 7800 4050 l 7650 4200 l 7575 4350 l
 7725 4350 l 8025 4275 l 8025 4050 l 8175 3975 l 8325 4200 l
 8475 4200 l 8625 4500 l 9225 4425 l 9300 4575 l 9675 4575 l
 9750 4350 l 10275 4350 l 10350 4350 l 10350 4575 l 10575 4650 l
 10725 4650 l 10725 4725 l 10725 4950 l 10875 4950 l 11100 5025 l
 11400 5100 l 11400 5325 l 11550 5400 l 11775 5550 l 11925 5700 l
 12292 5715 l 12375 5700 l 12525 5625 l 12675 5700 l 12825 5775 l
 13125 5925 l 13350 6000 l 13425 6225 l 13575 6300 l 13500 6450 l
 13575 6750 l 13725 6900 l 13950 6900 l 13875 7125 l 13950 7275 l
 14025 7500 l 14325 7500 l 14250 7650 l 14400 7650 l 14550 7575 l
 14775 7725 l 15075 7875 l 15150 7800 l 15300 7875 l 15300 7950 l
 15375 8025 l 15375 8175 l 15525 8250 l 15750 8175 l 15900 8250 l
 15975 8400 l 16275 8325 l 16275 8400 l 16545 8370 l 16740 8415 l
 16740 8565 l 16980 8670 l 17100 8775 l 17145 8955 l 17340 9045 l
 17550 9180 l 17745 9165 l 17955 9165 l 18060 9420 l 18075 9630 l
 18030 9750 l 17865 10515 l 17655 10650 l 17445 10770 l 17280 10890 l
 17190 11220 l 17010 11385 l 16905 11445 l 16695 11355 l 16710 11550 l
 16620 11850 l 16665 11985 l 16710 12150 l 16560 12435 l 16575 12675 l
 16380 12900 l 16350 13155 l 16170 13305 l 16155 13515 l 15975 13590 l
 15885 13935 l 15645 13965 l 15504 14105 l 15390 14070 l 15180 14115 l
 14925 14070 l 14940 14190 l 14775 14325 l 14610 14220 l 14430 14265 l
 14175 14430 l 14025 14610 l 13815 14715 l 13830 15090 l 13935 15240 l
 13815 15465 l 13575 15600 l 13380 15990 l 13365 16200 l 13155 16290 l
 12915 16455 l 12810 16665 l 12810 16890 l 12600 16980 l 12375 17175 l
 12255 17250 l 12090 17310 l 11925 17235 l 11670 17220 l 11565 17055 l
 11400 17010 l 11235 17220 l 11550 17340 l 11655 17475 l 11775 17685 l
 11835 17820 l 11595 18000 l 11415 18240 l 11280 18330 l 11040 18345 l
 10800 18405 l 10545 18285 l 10470 18360 l 10500 18525 l 10485 18675 l
 10620 18825 l 10440 18975 l 10035 18885 l 9885 18825 l 9885 18915 l
 9855 19245 l 10125 19185 l 10275 19425 l 10230 19530 l 10020 19530 l
 9930 19740 l 9930 19845 l 9915 20115 l 9600 20190 l 9495 20430 l
 9570 20640 l 9735 20610 l 9930 20640 l 9915 20895 l 9690 21030 l
 9510 21285 l 9570 21450 l 9330 21675 l 9345 21915 l 9510 22005 l
 9510 22290 l 9750 22530 l 9975 22515 l 10170 22515 l 10125 22875 l
 9495 23055 l 9180 22935 l 9135 22755 l 8850 22710 l 8865 22665 l
 8445 22590 l 8565 22455 l 8430 22305 l 8505 22155 l 8310 22110 l
 8370 21900 l 8130 21885 l 8115 21615 l 7860 21525 l 7935 21240 l
 7845 21015 l 8010 20895 l 7860 20670 l 7905 20235 l 8115 20385 l
 8115 19845 l 7890 19980 l 7830 19335 l 7905 19245 l 7860 18900 l
 7995 18510 l 7875 18255 l 7800 17955 l 7815 17730 l 7935 18000 l
 7950 17685 l 8025 17355 l 8085 17115 l 7890 16875 l 8010 16560 l
 8145 16395 l 7980 16035 l 7995 15840 l 8055 15690 l 8145 15105 l
 8085 14955 l 8175 14730 l 8070 14550 l 8160 14295 l 8085 13785 l
 8205 13755 l 8190 13605 l 8205 13350 l 8160 12975 l 8100 12780 l
 8085 12600 l 7800 12510 l 7725 12300 l 7425 12225 l 6720 12060 l
 6600 11745 l 6360 11550 l 6375 11250 l 6000 10875 l 5835 10605 l
 5700 10275 l 5535 9945 l 5370 9795 l 5280 9645 l 4815 9480 l
 4770 9285 l 4845 9270 l 4785 8880 l 5010 8715 l 5130 8505 l
 4950 8355 l 4980 8265 l 4815 7875 l 4920 7770 l 5070 7545 l
 5130 7335 l 5400 7050 l 5535 6810 l 5715 6750 l 5880 6540 l
 5805 6315 l 5850 6015 l 5760 5655 l 5625 5490 l 5625 5295 l
 5505 5160 l 5295 5250 l 5280 5445 l 5235 5610 l 4920 5715 l
 4770 5505 l 4395 5505 l 4065 5505 l 4020 5325 l 3630 5295 l
 3600 5055 l 3405 4875 l 3495 4710 l 3233 4631 l 2745 4507 l
 2745 2984 l
 cp gs col7 1.00 shd ef gr gs col0 s gr 
% Polyline
n 11220 22110 m 10995 22245 l 11175 22350 l 11040 22455 l 11205 22590 l 11385 22680 l
 11625 22545 l 11760 22515 l 11955 22395 l 11910 22155 l 12015 21885 l
 11820 21735 l 11700 21840 l 11580 21885 l 11535 21840 l 11460 21840 l

 cp gs col7 1.00 shd ef gr gs col0 s gr 
% Polyline
n 4560 18120 m 4485 18270 l 4335 18420 l 4395 18555 l 4635 18600 l 4785 18765 l
 5100 18915 l 5160 18675 l 5280 18630 l 5505 18615 l 5745 18600 l
 5790 18420 l 5730 18210 l 5520 18165 l 5325 18225 l 5115 18120 l
 4965 18030 l 4965 18045 l
 cp gs col7 1.00 shd ef gr gs col0 s gr 
% Polyline
nb
n 3607 5071 m 3839 4846 l 4012 4883 l
 4177 4666 l gs col0 s gr 
% Polyline
sb
n 18673 10162 m
 19223 9862 l gs col0 s gr 
% Polyline
2 slj
n 10005 4335 m 10006 4334 l 10007 4332 l 10010 4329 l 10013 4324 l 10017 4318 l
 10022 4309 l 10028 4298 l 10034 4284 l 10041 4267 l 10049 4245 l
 10058 4217 l 10069 4182 l 10080 4140 l 10088 4108 l 10096 4076 l
 10103 4047 l 10110 4022 l 10115 4001 l 10120 3984 l 10123 3971 l
 10127 3960 l 10130 3951 l 10133 3942 l 10135 3934 l 10138 3924 l
 10141 3913 l 10144 3897 l 10148 3878 l 10152 3853 l 10156 3823 l
 10161 3788 l 10166 3748 l 10170 3705 l 10173 3662 l 10176 3622 l
 10177 3587 l 10178 3558 l 10178 3535 l 10178 3517 l 10178 3503 l
 10178 3493 l 10177 3485 l 10176 3479 l 10175 3472 l 10174 3465 l
 10173 3455 l 10172 3442 l 10170 3425 l 10168 3404 l 10166 3376 l
 10163 3344 l 10159 3308 l 10155 3270 l 10150 3229 l 10144 3190 l
 10138 3156 l 10133 3126 l 10127 3098 l 10121 3074 l 10115 3052 l
 10110 3031 l 10104 3013 l 10099 2996 l 10094 2981 l 10090 2968 l
 10086 2957 l 10083 2950 l 10082 2944 l 10081 2941 l
 10080 2940 l gs col0 s gr 
% Polyline
n 11940 22275 m 11941 22274 l 11943 22273 l 11947 22271 l 11952 22267 l 11959 22262 l
 11968 22256 l 11979 22247 l 11991 22238 l 12005 22226 l 12019 22213 l
 12035 22198 l 12051 22180 l 12069 22160 l 12087 22136 l 12108 22108 l
 12131 22075 l 12155 22038 l 12182 21994 l 12210 21945 l 12232 21905 l
 12253 21866 l 12272 21829 l 12289 21797 l 12303 21769 l 12315 21746 l
 12325 21728 l 12332 21714 l 12338 21705 l 12342 21698 l 12345 21694 l
 12347 21692 l 12349 21690 l 12351 21688 l 12353 21684 l 12356 21677 l
 12361 21667 l 12367 21652 l 12375 21631 l 12386 21603 l 12400 21566 l
 12416 21522 l 12436 21468 l 12458 21405 l 12483 21333 l 12510 21255 l
 12529 21199 l 12547 21142 l 12565 21087 l 12583 21033 l 12599 20981 l
 12614 20932 l 12628 20887 l 12642 20845 l 12653 20807 l 12664 20773 l
 12674 20741 l 12683 20713 l 12691 20688 l 12698 20665 l 12704 20644 l
 12710 20625 l 12716 20607 l 12721 20589 l 12726 20572 l 12731 20556 l
 12737 20538 l 12742 20520 l 12748 20500 l 12754 20479 l 12761 20455 l
 12768 20429 l 12776 20399 l 12785 20367 l 12795 20330 l 12805 20290 l
 12817 20246 l 12829 20198 l 12842 20146 l 12856 20090 l 12871 20031 l
 12886 19970 l 12900 19908 l 12915 19845 l 12932 19767 l 12948 19694 l
 12962 19627 l 12974 19567 l 12985 19515 l 12993 19471 l 13000 19434 l
 13006 19405 l 13010 19381 l 13013 19364 l 13015 19351 l 13017 19342 l
 13017 19336 l 13018 19332 l 13017 19329 l 13017 19326 l 13017 19322 l
 13017 19317 l 13017 19309 l 13018 19298 l 13019 19282 l 13020 19262 l
 13023 19236 l 13025 19204 l 13029 19165 l 13032 19119 l 13037 19068 l
 13041 19011 l 13046 18949 l 13050 18885 l 13054 18821 l 13057 18759 l
 13059 18701 l 13062 18648 l 13064 18601 l 13065 18560 l 13067 18525 l
 13069 18496 l 13070 18472 l 13071 18453 l 13073 18437 l 13074 18425 l
 13075 18416 l 13076 18407 l 13078 18400 l 13078 18393 l 13079 18384 l
 13080 18375 l 13080 18362 l 13080 18347 l 13079 18327 l 13078 18303 l
 13076 18274 l 13073 18239 l 13070 18197 l 13065 18150 l 13059 18096 l
 13053 18038 l 13044 17975 l 13035 17910 l 13025 17849 l 13015 17789 l
 13003 17731 l 12992 17675 l 12980 17621 l 12968 17571 l 12956 17523 l
 12944 17477 l 12932 17433 l 12920 17391 l 12908 17350 l 12895 17311 l
 12883 17274 l 12871 17238 l 12859 17203 l 12847 17169 l 12835 17137 l
 12823 17106 l 12812 17077 l 12802 17050 l 12792 17025 l 12784 17003 l
 12776 16983 l 12769 16966 l 12763 16952 l 12759 16941 l 12755 16933 l
 12753 16927 l 12751 16923 l 12750 16921 l
 12750 16920 l gs col0 s gr 
% Polyline
n 10155 22650 m 10156 22650 l 10159 22651 l 10165 22653 l 10173 22656 l 10185 22659 l
 10200 22663 l 10218 22668 l 10238 22674 l 10261 22680 l 10287 22687 l
 10313 22694 l 10342 22700 l 10371 22707 l 10402 22713 l 10434 22719 l
 10468 22724 l 10503 22729 l 10540 22733 l 10579 22737 l 10620 22739 l
 10663 22741 l 10709 22741 l 10755 22740 l 10805 22737 l 10852 22733 l
 10896 22727 l 10936 22721 l 10973 22713 l 11007 22705 l 11039 22697 l
 11068 22688 l 11096 22679 l 11122 22669 l 11146 22660 l 11169 22650 l
 11189 22641 l 11208 22633 l 11224 22625 l 11237 22619 l 11248 22614 l
 11256 22610 l 11261 22607 l 11264 22606 l
 11265 22605 l gs col0 s gr 
% Polyline
n 9645 24210 m 9644 24209 l 9641 24207 l 9637 24203 l 9630 24198 l 9620 24190 l
 9609 24180 l 9595 24169 l 9581 24156 l 9565 24141 l 9548 24124 l
 9531 24106 l 9513 24086 l 9495 24064 l 9477 24040 l 9457 24012 l
 9437 23981 l 9417 23946 l 9396 23907 l 9375 23865 l 9357 23825 l
 9341 23787 l 9328 23751 l 9316 23720 l 9307 23693 l 9299 23670 l
 9293 23652 l 9289 23637 l 9286 23624 l 9283 23614 l 9281 23604 l
 9279 23594 l 9277 23583 l 9275 23571 l 9273 23556 l 9269 23537 l
 9265 23514 l 9261 23487 l 9256 23455 l 9250 23420 l 9245 23380 l
 9240 23340 l 9236 23292 l 9234 23249 l 9234 23210 l 9236 23176 l
 9238 23146 l 9242 23120 l 9246 23096 l 9251 23074 l 9257 23055 l
 9262 23037 l 9268 23021 l 9273 23008 l 9277 22998 l 9281 22990 l
 9283 22984 l 9284 22981 l
 9285 22980 l gs col0 s gr 
% Polyline
n 5805 18450 m 5805 18449 l 5806 18448 l 5808 18445 l 5811 18441 l 5815 18434 l
 5821 18426 l 5828 18416 l 5836 18403 l 5846 18388 l 5857 18371 l
 5869 18352 l 5882 18331 l 5896 18308 l 5911 18283 l 5927 18257 l
 5943 18229 l 5960 18199 l 5977 18168 l 5995 18136 l 6013 18101 l
 6032 18064 l 6052 18025 l 6072 17983 l 6094 17938 l 6116 17890 l
 6139 17839 l 6163 17783 l 6188 17724 l 6214 17660 l 6241 17594 l
 6268 17524 l 6292 17461 l 6315 17398 l 6336 17337 l 6357 17279 l
 6375 17225 l 6391 17174 l 6405 17128 l 6417 17086 l 6428 17049 l
 6436 17016 l 6443 16986 l 6448 16960 l 6452 16937 l 6455 16917 l
 6457 16898 l 6459 16882 l 6460 16866 l 6461 16851 l 6462 16835 l
 6463 16820 l 6464 16803 l 6467 16785 l 6470 16765 l 6474 16742 l
 6480 16716 l 6487 16687 l 6496 16654 l 6507 16617 l 6520 16576 l
 6535 16531 l 6552 16482 l 6572 16428 l 6593 16371 l 6617 16312 l
 6642 16251 l 6668 16190 l 6700 16119 l 6731 16052 l 6760 15990 l
 6787 15935 l 6810 15888 l 6831 15847 l 6848 15813 l 6862 15786 l
 6873 15765 l 6882 15748 l 6888 15736 l 6893 15727 l 6897 15721 l
 6899 15717 l 6901 15713 l 6904 15710 l 6907 15707 l 6911 15702 l
 6917 15695 l 6925 15685 l 6936 15671 l 6951 15654 l 6969 15631 l
 6991 15604 l 7018 15571 l 7049 15533 l 7086 15490 l 7126 15443 l
 7171 15392 l 7218 15340 l 7264 15291 l 7310 15244 l 7356 15199 l
 7401 15156 l 7445 15116 l 7487 15078 l 7529 15042 l 7569 15008 l
 7608 14976 l 7647 14946 l 7684 14917 l 7721 14889 l 7757 14863 l
 7792 14838 l 7827 14814 l 7860 14790 l 7893 14768 l 7924 14748 l
 7953 14728 l 7981 14710 l 8007 14694 l 8030 14679 l 8051 14666 l
 8069 14654 l 8083 14645 l 8095 14638 l 8104 14632 l 8111 14628 l
 8115 14626 l 8117 14625 l
 8118 14624 l gs col0 s gr 
% Polyline
n 4485 18562 m 4484 18563 l 4480 18564 l 4474 18567 l 4466 18571 l 4454 18577 l
 4438 18584 l 4420 18593 l 4399 18602 l 4377 18612 l 4352 18623 l
 4326 18634 l 4298 18645 l 4270 18656 l 4240 18667 l 4208 18678 l
 4175 18688 l 4139 18699 l 4101 18709 l 4061 18718 l 4019 18727 l
 3975 18735 l 3928 18742 l 3885 18747 l 3849 18751 l 3821 18753 l
 3801 18755 l 3787 18755 l 3779 18755 l 3776 18755 l 3775 18754 l
 3776 18753 l 3777 18751 l 3776 18750 l 3771 18748 l 3761 18746 l
 3744 18743 l 3719 18740 l 3684 18737 l 3640 18732 l 3586 18727 l
 3525 18720 l 3479 18715 l 3432 18709 l 3385 18703 l 3340 18697 l
 3295 18691 l 3252 18684 l 3210 18678 l 3169 18672 l 3129 18666 l
 3090 18659 l 3052 18653 l 3014 18647 l 2977 18641 l 2941 18635 l
 2907 18629 l 2874 18623 l 2843 18618 l 2814 18612 l 2788 18608 l
 2766 18604 l 2746 18600 l 2731 18598 l 2719 18595 l 2710 18594 l
 2704 18593 l 2701 18592 l
 2700 18592 l gs col0 s gr 
% Polyline
n 5460 6915 m 5458 6915 l 5452 6914 l 5443 6912 l 5428 6909 l 5407 6905 l
 5380 6900 l 5347 6894 l 5308 6887 l 5264 6879 l 5217 6869 l
 5166 6860 l 5114 6849 l 5060 6839 l 5007 6828 l 4954 6817 l
 4904 6807 l 4855 6796 l 4809 6786 l 4765 6776 l 4724 6766 l
 4686 6756 l 4651 6747 l 4618 6738 l 4588 6729 l 4560 6720 l
 4534 6712 l 4510 6703 l 4488 6694 l 4468 6685 l 4449 6676 l
 4432 6667 l 4412 6655 l 4393 6643 l 4376 6631 l 4360 6618 l
 4346 6604 l 4333 6590 l 4322 6575 l 4312 6559 l 4303 6543 l
 4295 6526 l 4289 6509 l 4284 6491 l 4280 6472 l 4277 6453 l
 4276 6434 l 4276 6414 l 4276 6394 l 4278 6375 l 4281 6354 l
 4284 6334 l 4288 6314 l 4292 6294 l 4297 6274 l 4303 6253 l
 4309 6233 l 4315 6212 l 4322 6191 l 4329 6169 l 4337 6146 l
 4345 6123 l 4353 6098 l 4363 6071 l 4373 6043 l 4385 6013 l
 4397 5981 l 4410 5946 l 4424 5910 l 4439 5871 l 4455 5831 l
 4471 5790 l 4488 5748 l 4504 5706 l 4520 5667 l 4535 5630 l
 4548 5597 l 4559 5570 l 4568 5548 l 4574 5532 l 4579 5521 l
 4581 5516 l
 4582 5513 l gs col0 s gr 
% Polyline
n 14830 7748 m 14831 7747 l 14832 7744 l 14834 7740 l 14838 7733 l 14843 7723 l
 14850 7710 l 14859 7695 l 14869 7677 l 14881 7656 l 14894 7633 l
 14909 7609 l 14925 7583 l 14943 7556 l 14961 7528 l 14981 7500 l
 15003 7471 l 15025 7442 l 15050 7413 l 15076 7384 l 15104 7354 l
 15135 7325 l 15168 7295 l 15205 7265 l 15244 7235 l 15287 7205 l
 15332 7176 l 15380 7148 l 15429 7122 l 15477 7100 l 15522 7079 l
 15563 7062 l 15600 7048 l 15631 7036 l 15657 7026 l 15678 7018 l
 15695 7012 l 15708 7007 l 15719 7004 l 15727 7001 l 15733 6999 l
 15739 6998 l 15746 6997 l 15753 6996 l 15762 6995 l 15774 6995 l
 15790 6994 l 15810 6993 l 15836 6992 l 15868 6991 l 15906 6990 l
 15952 6990 l 16004 6990 l 16063 6991 l 16128 6994 l 16196 6998 l
 16254 7003 l 16311 7009 l 16366 7016 l 16418 7023 l 16466 7029 l
 16510 7036 l 16550 7042 l 16585 7047 l 16616 7051 l 16644 7055 l
 16667 7058 l 16688 7061 l 16706 7063 l 16722 7065 l 16736 7066 l
 16749 7067 l 16762 7069 l 16774 7071 l 16787 7073 l 16801 7075 l
 16817 7079 l 16835 7084 l 16856 7090 l 16880 7097 l 16907 7106 l
 16938 7118 l 16974 7131 l 17014 7147 l 17058 7166 l 17107 7187 l
 17159 7211 l 17215 7237 l 17272 7267 l 17330 7298 l 17391 7333 l
 17448 7368 l 17502 7403 l 17552 7435 l 17596 7465 l 17634 7491 l
 17668 7515 l 17696 7534 l 17720 7551 l 17740 7565 l 17756 7576 l
 17769 7584 l 17780 7591 l 17788 7597 l 17796 7602 l 17802 7606 l
 17808 7611 l 17815 7617 l 17823 7624 l 17832 7634 l 17843 7646 l
 17856 7662 l 17872 7681 l 17892 7705 l 17914 7734 l 17941 7769 l
 17971 7809 l 18005 7856 l 18042 7909 l 18081 7967 l 18122 8031 l
 18163 8098 l 18197 8156 l 18229 8215 l 18259 8272 l 18287 8327 l
 18313 8378 l 18336 8426 l 18357 8470 l 18376 8509 l 18392 8545 l
 18406 8576 l 18419 8603 l 18429 8626 l 18439 8646 l 18446 8664 l
 18453 8679 l 18459 8692 l 18464 8704 l 18469 8715 l 18473 8726 l
 18477 8737 l 18481 8748 l 18485 8761 l 18489 8775 l 18494 8792 l
 18500 8812 l 18506 8835 l 18512 8863 l 18520 8894 l 18529 8931 l
 18538 8973 l 18548 9020 l 18559 9073 l 18571 9132 l 18583 9196 l
 18595 9266 l 18608 9340 l 18619 9418 l 18630 9498 l 18639 9575 l
 18647 9650 l 18653 9723 l 18658 9792 l 18663 9856 l 18667 9915 l
 18670 9967 l 18672 10014 l 18674 10055 l 18676 10090 l 18677 10120 l
 18678 10144 l 18679 10164 l 18680 10180 l 18680 10193 l 18681 10202 l
 18681 10209 l 18681 10214 l 18681 10219 l 18680 10223 l 18680 10227 l
 18679 10232 l 18678 10238 l 18677 10247 l 18675 10259 l 18673 10275 l
 18670 10295 l 18667 10319 l 18663 10350 l 18658 10387 l 18652 10431 l
 18645 10482 l 18638 10541 l 18629 10608 l 18619 10683 l 18607 10766 l
 18594 10856 l 18579 10954 l 18563 11057 l 18546 11165 l 18532 11250 l
 18517 11335 l 18502 11419 l 18487 11502 l 18473 11582 l 18459 11659 l
 18446 11732 l 18434 11802 l 18423 11867 l 18413 11928 l 18403 11985 l
 18395 12037 l 18389 12086 l 18383 12130 l 18378 12170 l 18374 12206 l
 18371 12239 l 18369 12269 l 18367 12296 l 18366 12321 l 18366 12344 l
 18366 12365 l 18366 12384 l 18367 12403 l 18367 12420 l 18368 12438 l
 18368 12456 l 18368 12474 l 18368 12493 l 18367 12513 l 18365 12535 l
 18362 12559 l 18359 12585 l 18354 12614 l 18348 12647 l 18340 12682 l
 18330 12722 l 18319 12766 l 18306 12814 l 18290 12867 l 18272 12925 l
 18252 12988 l 18230 13056 l 18204 13129 l 18176 13208 l 18145 13292 l
 18111 13380 l 18075 13472 l 18036 13569 l 17994 13668 l 17950 13769 l
 17904 13872 l 17860 13967 l 17815 14061 l 17770 14153 l 17725 14243 l
 17681 14328 l 17639 14411 l 17598 14488 l 17559 14562 l 17522 14630 l
 17488 14694 l 17456 14753 l 17426 14807 l 17399 14857 l 17375 14902 l
 17352 14942 l 17332 14979 l 17314 15011 l 17298 15041 l 17283 15066 l
 17271 15089 l 17260 15109 l 17250 15127 l 17241 15143 l 17233 15157 l
 17226 15170 l 17219 15181 l 17213 15192 l 17206 15203 l 17199 15214 l
 17192 15224 l 17184 15236 l 17175 15249 l 17165 15263 l 17154 15278 l
 17140 15296 l 17125 15316 l 17108 15338 l 17088 15363 l 17065 15392 l
 17040 15424 l 17011 15460 l 16979 15500 l 16943 15544 l 16903 15593 l
 16859 15646 l 16811 15704 l 16759 15766 l 16702 15833 l 16641 15905 l
 16575 15981 l 16506 16061 l 16432 16145 l 16354 16232 l 16274 16322 l
 16190 16413 l 16104 16505 l 16025 16588 l 15945 16671 l 15865 16753 l
 15785 16833 l 15705 16912 l 15625 16989 l 15547 17065 l 15469 17138 l
 15392 17210 l 15316 17280 l 15241 17348 l 15167 17414 l 15095 17478 l
 15023 17541 l 14952 17602 l 14882 17661 l 14813 17719 l 14745 17776 l
 14678 17831 l 14611 17885 l 14545 17938 l 14480 17990 l 14415 18041 l
 14351 18091 l 14288 18140 l 14225 18188 l 14163 18235 l 14102 18282 l
 14041 18327 l 13981 18371 l 13923 18415 l 13865 18457 l 13808 18499 l
 13752 18539 l 13697 18578 l 13644 18616 l 13593 18653 l 13543 18688 l
 13495 18722 l 13449 18755 l 13405 18785 l 13364 18814 l 13324 18842 l
 13287 18867 l 13253 18891 l 13222 18913 l 13193 18933 l 13166 18951 l
 13143 18967 l 13122 18981 l 13104 18994 l 13088 19004 l 13075 19013 l
 13064 19021 l 13056 19026 l 13049 19031 l 13044 19034 l 13041 19037 l
 13039 19038 l
 13037 19039 l gs col0 s gr 
% Polyline
n 6300 11182 m 6299 11182 l 6298 11183 l 6295 11185 l 6290 11188 l 6284 11192 l
 6275 11197 l 6264 11203 l 6250 11211 l 6234 11220 l 6216 11231 l
 6195 11243 l 6172 11255 l 6147 11270 l 6120 11284 l 6090 11300 l
 6060 11317 l 6027 11334 l 5993 11352 l 5958 11370 l 5921 11388 l
 5882 11407 l 5842 11426 l 5800 11446 l 5756 11466 l 5710 11487 l
 5661 11508 l 5610 11529 l 5556 11551 l 5498 11574 l 5438 11598 l
 5373 11622 l 5306 11646 l 5235 11671 l 5161 11697 l 5085 11722 l
 5012 11745 l 4939 11768 l 4868 11790 l 4798 11810 l 4729 11829 l
 4663 11848 l 4599 11865 l 4537 11881 l 4477 11896 l 4419 11910 l
 4362 11924 l 4307 11936 l 4254 11948 l 4201 11960 l 4150 11970 l
 4100 11981 l 4051 11991 l 4004 12000 l 3957 12009 l 3912 12017 l
 3869 12025 l 3827 12033 l 3788 12040 l 3751 12047 l 3716 12053 l
 3684 12058 l 3656 12063 l 3630 12067 l 3608 12071 l 3590 12074 l
 3574 12076 l 3562 12078 l 3553 12080 l 3547 12081 l 3543 12082 l
 3541 12082 l
 3540 12082 l gs col0 s gr 
% Polyline
nb
0 slj
n 5760 5651 m 5805 5415 l 5895 5400 l
 6034 5156 l gs col0 s gr 
% Polyline
n 5336 7121 m 5820 7290 l 5940 7275 l 6030 7410 l 6225 7455 l 6382 7336 l
 6495 7485 l 6570 7455 l 6735 7455 l 6930 7590 l 6885 7755 l
 7125 7785 l 7170 7995 l 7260 8025 l 7350 8115 l 7440 8100 l
 7605 7965 l 7695 8055 l 7875 7995 l 7980 8040 l 8085 8115 l
 7935 8400 l 8115 8550 l 8325 7710 l 8235 7605 l 8205 7485 l
 8130 7455 l 8070 7290 l 8325 7230 l 8340 7080 l 8115 7125 l
 8145 6885 l 8565 6945 l 8595 6795 l 8700 6915 l 8865 6735 l
 8775 6570 l 8835 6390 l 8715 6165 l 8700 5970 l 8790 5670 l
 8745 5580 l 8310 5685 l 8220 5655 l 8145 5475 l 7965 5460 l
 7560 5520 l 7455 5475 l 7440 5355 l 7380 5340 l 7335 5190 l
 7380 5115 l 7290 4875 l 7170 4890 l 7005 4920 l 7185 4725 l
 7140 4605 l 7350 4395 l 7395 4305 l 7470 4185 l
 7657 4196 l gs col0 s gr 
% Polyline
n 6529 7481 m 6630 7710 l 6690 7860 l 6495 7920 l 6465 8100 l 6255 8220 l
 6000 8340 l 5865 8445 l 5775 8700 l 5685 8880 l 5580 9015 l
 5400 9075 l 5370 8910 l 5205 8910 l
 4961 8756 l gs col0 s gr 
% Polyline
n 8089 12600 m 8310 12510 l 8280 12420 l 8415 12240 l 8565 12060 l 8475 11895 l
 8370 11760 l 8430 11595 l 8370 11490 l 8520 11340 l 8445 11235 l
 8535 11115 l 8460 11010 l 8610 10860 l 8250 10440 l 8115 10425 l
 7965 10530 l 7995 10050 l 7815 10140 l 7650 10305 l 7530 10230 l
 7440 10080 l 7185 10110 l 7275 9945 l 7140 9825 l 7035 9630 l
 6990 9525 l 7035 9465 l 7020 9375 l 7260 9285 l 7200 9075 l
 7290 8955 l 7245 8850 l 7485 8715 l 7740 8625 l 7890 8685 l

 8122 8542 l gs col0 s gr 
% Polyline
n 8865 6735 m 9000 6885 l 9105 7110 l 9240 7080 l 9375 7155 l 9450 7020 l
 9660 6945 l 9810 6795 l 9990 6765 l 9975 6660 l 9795 6555 l
 9780 6375 l 9690 6270 l 9600 6165 l 9810 6120 l 9915 6270 l
 10080 6270 l 10140 6375 l 10140 6225 l 10500 6165 l 10680 6030 l
 10740 6030 l 10785 5925 l 10680 5745 l 10530 5655 l 10620 5460 l
 10860 5370 l 10830 5280 l 10815 5145 l
 11059 5010 l gs col0 s gr 
% Polyline
n 8310 10515 m 8520 10410 l 8535 10485 l 8670 10440 l 8715 10335 l 8820 10320 l
 8865 10260 l 9090 10095 l 9450 10050 l 9570 10185 l 9495 10245 l
 9585 10425 l 9435 10545 l 9585 10725 l 9735 10800 l 10050 10875 l
 10125 10890 l 10199 11011 l 10380 11025 l 10425 11085 l 10695 11100 l
 10935 11190 l 10980 11505 l 10875 11520 l 10890 11670 l 10920 11850 l
 11520 12000 l 11400 12150 l 11505 12255 l 11595 12330 l 11595 12735 l
 11565 12870 l 11460 12930 l 11205 12705 l 11085 12735 l 10920 12810 l
 10770 12780 l 10590 12855 l 10440 12870 l 10320 13140 l 10350 13350 l
 10245 13545 l 9990 13560 l 9840 13755 l 9705 13575 l 9540 13590 l
 9345 13515 l 9210 13575 l 9105 13755 l 9045 13830 l 8895 13830 l
 8835 13455 l 8760 13290 l 8610 13140 l 8700 12960 l 8655 12765 l
 8580 12540 l
 8385 12300 l gs col0 s gr 
% Polyline
n 9075 13785 m 9135 13965 l 9045 14160 l 8910 14325 l 8760 14370 l 8895 14640 l
 8835 14790 l 9000 14955 l 8895 15060 l 8760 15165 l 8655 15570 l
 8595 15615 l 8655 15840 l 8610 15945 l 8490 16215 l 8355 16305 l
 8595 16485 l 8685 16740 l 8760 16935 l 8685 17160 l 8610 17355 l
 8670 17535 l 8550 17745 l 8430 17835 l 8475 18150 l 8610 18300 l
 8445 18435 l 8490 18690 l 8370 18750 l 8385 18915 l 8460 19050 l
 8490 19245 l 8400 19365 l 8430 19635 l 8595 19710 l 8760 19905 l
 8640 20160 l 8790 20265 l 8805 20355 l 8820 20640 l 8805 20760 l
 8760 21075 l 8595 21225 l 8445 21390 l 8460 21555 l 8610 21645 l
 8760 21705 l 8850 21975 l 9165 21960 l
 9424 21964 l gs col0 s gr 
% Polyline
n 11790 15637 m 11925 15690 l 11970 15915 l 12120 16005 l 12240 15960 l 12405 16050 l
 12375 16185 l 12600 16275 l 12735 16350 l
 12870 16534 l gs col0 s gr 
% Polyline
n 12262 14617 m 12585 14550 l 12570 14760 l 12630 14970 l 12435 15150 l 12195 15150 l
 11895 15300 l 11790 15630 l 11580 15705 l 11430 15870 l 11355 16035 l
 11310 16245 l 11250 16410 l 11220 16665 l
 11400 17010 l gs col0 s gr 
% Polyline
n 10192 13560 m 10470 13845 l 10860 14085 l 11085 14085 l 11310 14205 l 11505 14385 l
 11520 14520 l 11265 14910 l 11280 15015 l 11550 15060 l 11880 15000 l
 12180 14985 l 12270 14790 l 12270 14490 l 12420 14325 l 12420 14040 l
 12210 14085 l 12135 13845 l 12150 13560 l 11910 13485 l 11730 13680 l
 11475 13530 l 11565 13125 l
 11520 12900 l gs col0 s gr 
% Polyline
n 10777 5914 m 10905 5880 l 11055 5940 l 10965 6105 l 11070 6120 l 11040 6210 l
 10965 6390 l 10905 6570 l 10995 6660 l 10980 6810 l 11115 7005 l
 11265 7020 l 11430 6915 l 11685 6825 l 11850 6810 l 12165 6855 l
 12120 6645 l 12270 6615 l 12435 6645 l 12525 6780 l 12840 6735 l
 13110 6780 l 13215 6465 l
 13485 6251 l gs col0 s gr 
% Polyline
ib
n 5932 5362 m 6075 5475 l 6247 5602 l 6270 5730 l 6900 5827 l 6982 5632 l
 7185 5512 l
 7350 5287 l gs col0 s gr 
% Polyline
n 6667 7448 m 6719 7276 l 6877 7193 l 6764 7051 l 6809 6908 l 6937 6720 l
 6982 6487 l 7125 6247 l 6997 6157 l
 6840 5820 l gs col0 s gr 
% Polyline
n 8775 5632 m 8910 5475 l 8970 5340 l 8790 5115 l 8655 4920 l 8730 4770 l
 8917 4642 l
 8865 4455 l gs col0 s gr 
% Polyline
n 10012 6262 m 10147 6097 l 10065 5887 l 9922 5715 l 9930 5640 l 9847 5527 l
 9720 5437 l 9555 5452 l 9427 5332 l 9315 5250 l 9157 5212 l
 9082 5295 l
 8902 5250 l gs col0 s gr 
% Polyline
n 5730 10357 m 5985 10275 l 6127 10162 l 6457 10170 l 6570 10245 l 6810 10245 l
 6945 10087 l
 7215 10065 l gs col0 s gr 
% Polyline
n 6750 10245 m 6825 10372 l 6990 10395 l 7192 10530 l 7425 10597 l 7507 10725 l
 7455 10965 l 7222 11085 l 7470 11445 l 7342 11565 l 7342 11737 l
 7402 11752 l 7417 11880 l 7327 11940 l 7290 12075 l
 7207 12172 l gs col0 s gr 
% Polyline
n 9675 6930 m 9855 7200 l 9960 7312 l 9705 7815 l 9802 8025 l 9870 8107 l
 9870 8197 l 9765 8280 l 9840 8475 l 9832 8692 l 9705 8775 l
 9675 9022 l 9862 9345 l 9615 9562 l 9690 9742 l 9645 9862 l

 9502 10102 l gs col0 s gr 
% Polyline
n 9675 9750 m 10207 9683 l 10372 9923 l 10634 9968 l 11107 9832 l 11332 9645 l
 11782 9481 l 12464 9608 l 13162 9601 l
 13657 9241 l gs col0 s gr 
% Polyline
n 9862 8167 m 10207 8160 l 10312 8265 l 10627 8475 l 10680 8587 l 11032 8685 l
 11400 8617 l 11767 8430 l 11917 8452 l 12165 8662 l 12862 8542 l
 12637 8265 l 12345 7957 l 12472 7845 l 12435 7657 l 12517 7432 l
 12322 7200 l 12082 7192 l 11887 7035 l
 11992 6825 l gs col0 s gr 
% Polyline
n 12420 14137 m 12630 14077 l 12802 13980 l 13057 14017 l 13110 14115 l 13672 13972 l
 13717 14025 l 13965 14160 l 14137 14115 l
 14362 14325 l gs col0 s gr 
% Polyline
n 13856 12634 m 13927 12360 l 14167 12187 l 14670 11970 l 14767 11640 l 15442 11662 l
 15802 11977 l 16020 12127 l 16342 12052 l
 16627 12300 l gs col0 s gr 
% Polyline
n 14947 11647 m 15150 11407 l 14992 11257 l 15097 11100 l 14820 10620 l 14895 10402 l
 15022 10275 l 14992 10200 l
 15030 10054 l gs col0 s gr 
% Polyline
n 10732 11107 m 10627 11250 l 10477 11280 l 10177 11265 l 9855 11467 l 9472 11557 l
 9187 11910 l 9292 12075 l 9195 12375 l 9300 12502 l 9577 12577 l
 9735 12585 l 9997 12982 l
 10372 13020 l gs col0 s gr 
% Polyline
n 8715 15375 m 8445 15555 l
 8085 15465 l gs col0 s gr 
% Polyline
n 11250 16530 m 10695 16755 l 10455 16732 l 10252 16642 l
 9870 16432 l gs col0 s gr 
% Polyline
n 8475 18045 m 8295 18060 l 8175 17955 l
 7935 17850 l gs col0 s gr 
% Polyline
n 7995 20895 m 8220 20790 l 8340 20760 l 8370 20835 l
 8805 20865 l gs col0 s gr 
% Polyline
n 10665 18330 m 10710 18105 l 10110 17760 l 10035 17895 l
 9810 17767 l gs col0 s gr 
% Polyline
n 9945 19785 m 9615 19620 l 9435 19455 l 9495 19215 l 9075 18810 l 9285 18510 l
 9285 18300 l
 9112 17996 l gs col0 s gr 
% Polyline
n 6937 6721 m 7312 6637 l 7410 6652 l 7522 6532 l 7822 6480 l 8017 6532 l
 8212 6698 l
 8234 6908 l gs col0 s gr 
% Polyline
n 5879 6488 m 6097 6421 l 6247 6466 l 6314 6353 l 6419 6361 l 6389 6518 l
 6554 6488 l 6757 6413 l
 7012 6443 l gs col0 s gr 
% Polyline
n 8782 10328 m 8542 9646 l 8407 9488 l 8609 9143 l 8489 8858 l 8519 8798 l
 8617 8753 l 8699 8708 l 8684 8611 l 8557 8453 l 8542 8326 l
 8609 8176 l 8999 7883 l 8969 7793 l 8984 7681 l 9037 7628 l
 9014 7493 l 8947 7373 l 8827 7163 l 9029 6968 l
 9037 6976 l gs col0 s gr 
% Polyline
n 12870 8535 m 12952 8707 l 12832 8805 l 13035 9135 l 13117 9007 l 13552 9150 l
 13987 9480 l 13867 9817 l 14805 10125 l
 15029 10058 l gs col0 s gr 
% Polyline
n 13432 14032 m 13365 13935 l 13537 13755 l 13837 13515 l 14205 13312 l 14130 13170 l
 14115 12937 l 13972 12727 l
 13844 12638 l gs col0 s gr 
% Polyline
n 12622 9608 m 12577 9923 l 12464 10036 l 12502 10366 l 12352 10523 l 12487 10748 l
 11992 10846 l 11684 10823 l 11549 10943 l 11527 11146 l 11669 11251 l
 11789 11348 l 11594 11738 l
 11152 11902 l gs col0 s gr 
% Polyline
n 6944 10088 m 6787 9923 l 6554 9743 l 6374 9496 l 6494 9316 l 6254 9031 l
 6232 8806 l 6022 8476 l
 6112 8287 l gs col0 s gr 
% Polyline
n 8542 12481 m 8639 12301 l 8744 12211 l 8864 12203 l 8939 11978 l 8939 11896 l
 8894 11836 l 9052 11791 l 9149 11723 l
 9315 11760 l gs col0 s gr 
% Polyline
n 8864 13621 m 8737 13786 l 8632 13913 l 8504 13913 l 8482 13966 l 8422 13988 l
 8294 13943 l 8234 14003 l
 8107 13973 l gs col0 s gr 
% Polyline
n 11872 15398 m 11587 15436 l 11452 15473 l 11347 15398 l 11219 15338 l 11084 15368 l
 10949 15316 l 10949 15211 l 10732 15076 l 10312 14926 l 10327 14791 l
 10237 14761 l 10169 14836 l 9944 14776 l
 9824 15061 l gs col0 s gr 
% Polyline
n 8730 16845 m 8970 16815 l 9180 16665 l 9525 16725 l 9802 16680 l 9765 16582 l
 10095 16095 l 9900 15825 l 9862 15518 l 9967 15211 l 9719 14933 l
 9524 14723 l
 9539 13583 l gs col0 s gr 
% Polyline
n 8565 17745 m 8805 17880 l 8985 18000 l 9225 18000 l 9630 17955 l 9645 18105 l
 9795 17985 l 9825 17595 l 9945 17535 l 10125 17145 l 9922 17017 l

 9720 16695 l gs col0 s gr 
} def

/Centres {
CON NC           % Concepcion (Con)
SAN NC           % Santiago (San)
ANT NC           % Antofagasta (Ant)
MDP NC           % Mar del Plata (MdP)
BAI NC           % Buenos Aires (BAi)
SFE NC           % Santa Fe (SFe)
URU NC           % Uruguay (Uru)
PRG NC           % Paraguay (Prg)
LAP NC           % La Paz (LaP)
ARE NC           % Arequipa (Are)
LIM NC           % Lima (Lim)
RDJ NC           % Rio de Janeiro (RdJ)
ECU NC           % Ecuador (Ecu)
BLM NC           % Belem (Blm)
MED NC           % Medellin (Med)
GUY NC           % Guyana (Guy)
CRC NC           % Caracas (Crc)
BOG NC           % Bogota (Bog)
BAR NC           % Barranquilla (Bar)
JUA NC           % Islas Juan Fernandez (Jua)
MAN NC           % Manaus (Man)
CHI NC           % Chiclayo (Chi)
CRI NC           % Costa Rica (CRi)
POT NC           % Potosi (Pot)
} def

/CON { 250 940 } def
/SAN { 420 943 } def
/ANT { 570 936 } def
/MDP { 350 864 } def
/BAI { 400 795 } def
/SFE { 540 780 } def
/URU { 460 720 } def
/PRG { 650 780 } def
/LAP { 795 895 } def
/ARE { 755 975 } def
/LIM { 785 1040 } def
/RDJ { 660 530 } def
/ECU { 990 1100 } def
/BLM { 900 480 } def
/MED { 1105 1085 } def
/GUY { 1100 740 } def
/CRC { 1175 850 } def
/BOG { 1090 940 } def
/BAR { 1160 1050 } def
/JUA { 368 1139 } def
/MAN { 915 760 } def
/CHI { 880 1080 } def
/CRI { 1230 1230 } def
/POT { 685 880 } def

/DrawMap {
mapdict begin
premap
doeps
Centres
postmap
end
} def
/DrawNickNames {
950 900 (ABA) DrawName
895 960 (ACR) DrawName
570 936 (ANT) DrawName
755 975 (ARE) DrawName
655 933 (ATA) DrawName
400 800 (BAI) DrawName
1160 1050 (BAR) DrawName
650 1100 (BDA) DrawName
400 1020 (BDC) DrawName
900 480 (BLM) DrawName
1090 980 (BOG) DrawName
550 500 (BRZ) DrawName
1230 1100 (CAR) DrawName
880 1080 (CHI) DrawName
270 750 (COA) DrawName
250 940 (CON) DrawName
1020 995 (COR) DrawName
1175 850 (CRC) DrawName
1230 1230 (CRI) DrawName
990 1100 (ECU) DrawName
960 1209 (GAL) DrawName
1080 1140 (GDP) DrawName
750 650 (GOI) DrawName
520 885 (GRC) DrawName
1100 740 (GUY) DrawName
368 1139 (JUA) DrawName
795 895 (LAP) DrawName
785 1040 (LIM) DrawName
1050 1070 (MAG) DrawName
910 730 (MAN) DrawName
1180 450 (MAO) DrawName
350 834 (MDP) DrawName
1095 1060 (MED) DrawName
588 795 (MES) DrawName
840 805 (MGR) DrawName
930 1035 (MNT) DrawName
1110 885 (OSP) DrawName
410 880 (PAM) DrawName
220 890 (PAT) DrawName
1158 1187 (PNM) DrawName
685 880 (POT) DrawName
650 790 (PRG) DrawName
660 520 (RDJ) DrawName
1000 760 (ROR) DrawName
420 943 (SAN) DrawName
90 1100 (SCO) DrawName
500 1250 (SEP) DrawName
480 810 (SFE) DrawName
510 670 (SUL) DrawName
80 500 (SWA) DrawName
125 915 (TDF) DrawName
1185 960 (TRU) DrawName
460 720 (URU) DrawName
730 820 (YUN) DrawName
} def
